home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / wpr____3.p2s < prev    next >
Encoding:
Text File  |  1994-04-27  |  1.3 KB  |  63 lines
  1. ######################################################################
  2. #
  3. #  Test play possibilities
  4. #
  5. ######################################################################
  6.  
  7. open waveaudio00 alias wave notify
  8. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  9. @WAIT_NOTIFY 1 30000
  10.  
  11. play wave notify
  12. =!ERROR
  13. load wave ?AP2PATH?A8B22K.WAV notify
  14. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #2
  15. @WAIT_NOTIFY 2 30000
  16.  
  17. play wave from 5000 to 300 wait
  18. =!ERROR
  19.  
  20. play wave from 5000 to 4999 wait
  21. =!ERROR
  22.  
  23. play wave from 5000 to 5000 wait
  24. =!ERROR
  25.  
  26. play wave from 0 to 300000 wait
  27. =!ERROR
  28.  
  29. play wave to 0 wait
  30. =!ERROR
  31.  
  32. seek wave to 0 notify
  33. +MM_MCINOTIFY MM_MCINOTIFY_SUCCESSFUL MCI_SEEK #3
  34. @WAIT_NOTIFY 3 30000
  35.  
  36. play wave notify
  37. +MM_MCINOTIFY MM_MCINOTIFY_SUPERSEDED MCI_PLAY #4
  38.  
  39. play wave notify
  40. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #5
  41. @WAIT_NOTIFY 4 30000
  42.  
  43. cue wave output notify
  44. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #6
  45. @WAIT_NOTIFY 6 30000
  46. @WAIT_NOTIFY 5 30000
  47.  
  48. seek wave to 0 wait
  49. status wave position wait
  50. =0
  51.  
  52. play wave notify
  53. +MM_MCINOTIFY MCI_NOTIFY_SUPERSEDED MCI_PLAY #7
  54.  
  55. play wave to 10000 notify
  56. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #8
  57. @WAIT_NOTIFY 7 30000
  58. @WAIT_NOTIFY 8 30000
  59.  
  60. close wave notify
  61. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #9
  62. @WAIT_NOTIFY 9 30000
  63.